FDR/FDR.iso/FDR/FDR.DXR/00009_sprite scripts.ls

Text File | 1996-10-22 | 576 b | 23 lines

on clickWait
  puppetSound("click")
  updateStage()
  repeat while the stillDown
  end repeat
end

on setPuppets onOrOff, puppetList
  set maxCtr to count(puppetList)
  repeat with ctr = 1 to maxCtr
    puppetSprite(getAt(puppetList, ctr), onOrOff)
  end repeat
end

on showSprite theSpriteNum, theCastName, pt, update
  set the castLibNum of sprite theSpriteNum to the castLibNum of member theCastName
  set the memberNum of sprite theSpriteNum to the memberNum of member theCastName
  set the loc of sprite theSpriteNum to pt
  if update then
    updateStage()
  end if
end